home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 22
/
Aminet 22 (1997)(GTI - Schatztruhe)[!][Dec 1997].iso
/
Aminet
/
util
/
misc
/
SuperToto_New.lha
/
demosupertoto
/
SuperToto_Install
< prev
next >
Wrap
Text File
|
1997-09-24
|
1KB
|
81 lines
; $VER: Script d'installazione per SuperToto Version 1.1 (22.09.97)
(set @default-dest "Work:")
(set #DeOn "Demo/")
(set #Font "Fonts/")
(set #Lib "Libs/")
(message
(cat "SuperToto Version 1.1 - Rev. 16 Settembre 1997 \n \n"
"Scritto da Nicolò Sportaro e Nando Gentile")
)
(complete 0)
(copyfiles
(prompt "Copia dei font necessari per SuperToto")
(help
"Ora l'installer provvederà a copiare nel vostro \n"
"sistema i fonts Xen. Qualora non lo desideraste, \n"
"potete sempre deselezionare questa scelta, ma \n"
"ricordate che SuperToto non funziona senza \n"
"questi fonts")
(source #Font)
(dest "Fonts:")
(all)
(confirm)
)
(complete 10)
(copyfiles
(source #Lib)
(dest "Libs:")
(all)
)
(complete 20)
(set target
(tackon
(askdir
(prompt "Seleziona la destinazione ove creare il cassetto chiamato SuperToto")
(help @askdir-help)
(default @default-dest)
)
"SuperToto"
)
)
(makedir target
(infos)
)
(set @default-dest target)
(copyfiles
(prompt "Installo SuperToto ")
(help "Installazione di SuperToto \n \n" @copyfiles-help)
(source #DeOn)
(dest target)
(all)
)
(complete 50)
(copyfiles
(prompt "Installo HelpSuperToto in " target)
(help "Installazione di SuperToto.Guide \n \n" @copyfiles-help)
(source "")
(dest target)
(choices "HelpSuperToto" )
(confirm)
(infos)
)
(complete 100)
(message
(cat "Installazione di SuperToto terminata. Il programma \n"
"non richiede alcun assegnamento particolare per funzionare.")
)